{
 *****************************************************************************
 *                                                                           *
 *  This file is part of the EducationLaz package                            *
 *                                                                           *
 *  See the file COPYING.modifiedLGPL.txt, included in this distribution,    *
 *  for details about the copyright.                                         *
 *                                                                           *
 *  This program is distributed in the hope that it will be useful,          *
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of           *
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.                     *
 *                                                                           *
 *****************************************************************************

  Author: Mattias Gaertner

  Abstract:
    Dialog to setup the education package.
}
unit EduOptionsDlg;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
  ButtonPanel, ComCtrls, ExtCtrls;

type

  { TEduOptionsDialog }

  TEduOptionsDialog = class(TForm)
    ButtonPanel1: TButtonPanel;
    FramePanel: TPanel;
    FramesTreeView: TTreeView;
    procedure ButtonPanel1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end; 

var
  EduOptionsDialog: TEduOptionsDialog;

procedure Register;

implementation

procedure Register;
begin

end;

{ TEduOptionsDialog }

procedure TEduOptionsDialog.FormCreate(Sender: TObject);
begin
  ButtonPanel1.OKButton.OnClick:=@ButtonPanel1Click;
end;

procedure TEduOptionsDialog.ButtonPanel1Click(Sender: TObject);
begin

end;

initialization
  {$I eduoptionsdlg.lrs}

end.

